home *** CD-ROM | disk | FTP | other *** search
/ Multimedia Selection / Multimedia Selection Volume One - CD-ROM / MULTIMEDIA SELECTION____________.ISO / programz / c / cuj0908.arj / 9N08012A < prev    next >
Encoding:
Text File  |  1991-07-10  |  184 b   |  9 lines

  1. /* floor function */
  2. #include "xmath.h"
  3.  
  4. double (floor)(double x)
  5.         {       /* compute floor(x) */
  6.         return (_Dint(&x, 0) < 0 && x < 0.0 ? x - 1.0 : x);
  7.         }
  8.  
  9.